RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 
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mm 
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HH HH 
HH HH 
HH H 
HH HH 
HH HH 
HH HH 
HHHHHHHHHH 
HHHHHHHHHH 
HH H 
HH HH 
HH HH 
HH HH 
HH HH 
HH HH 
QQQQdQa 
QQQaaQ 
QQ QQ 
QQ Qa 
QQ QQ 
QQ QQ 
QQ QQ 
Q QQ 
QQ QQ QQ 
QQ QQ QQ 
QQ Q 
QQ QQ 
QQQQ aa 
QQQQg QQ 
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1 
Version: *v04-000' 


VeRO RRR RE REET AEAAAAAEARAARAAARRAA AA EAEEAEEE EEA E EET E TTT 


'* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
'* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
'* ALL RIGHTS RESERVED. 


® 
*® 
* 
& 
® 
:* THIS SOFTWARE IS Ag | UNDER A LICENSE AND MAY BE USED AND corey * 
:* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
:* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
:* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
:* TRANSFERRED. * 
4 ® 
:@ pi INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
Hie SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
@ CORPORATION. * 

® 

x 

® 

® 

*® 

* 


tt DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


LRA ERR REAR EAE ERATE AAAS 
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FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 


i ABSTRACT: 
Definition of operations that can be performed by CLH. 


i ENVIRONMENT: Transportable BLISS 


t AUTHOR: Rich Friday 
CREATION DATE: 1978 
: i MODIFIED BY: 
006 KAD00006 Keith Dawson 07-Mar-1983 


Global edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS (ibrary. 


LITERAL 
Open primary input file. 
open output file. 

ose current input file. 
Close output file. 
Read a record from current input file. 
Write a record to output file, add CRiF. 
Save current input-file status on stack. 
Get back previous input-file status. 


CLH_OPEN_ INPUT 
ct OPEN” OUT 
C 
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' Open a nested file (.REQUIRE ‘'file-spec’'). 
' Close the top-most REQUIRE e. 

T_NOCRLF ! Write a record, but don't add CRLF. 

CLOSE _DEL_OUT ! Close and delete output file. 
OPEN_INIT ! Open initialization file. 


LITERAL 
CLH_OPS_COUNT 


: End of CLHOPS.REQ 
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